Top 10k strings from Complete Machine Code Package (1988)(Roybot)(Side A).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /

Back to the directory listing

   2 test.bin  
   2 ival>65535
   2 d$(a)=b$(e):
   2 d$(a)=b$(a):
   2 a;m$(j+a):
   1 yj=jval-12
   1 y$(b)="NO"
   1 y$(a)="YES"
   1 test=33641
   1 test.bas  
   1 sy+d)=y$(y(yj)):
   1 scode=45000
   1 ret            pop hl         S
   1 ret            nop            S
   1 pop hl         exx            S
   1 onbp=33633
   1 ns=y(b)-a:
   1 nop;ld bc,NN;ld (bc),a;inc bc;inc b;dec b;ld b,N;rlca;ex af,af';add hl,bc;ld a,(bc);dec bc;inc c;dec c;ld c,N;rrca;djnz DIS;ld de,NN;ld (de),a;inc de;inc d;dec d;ld d,N;rla;jr DIS;add hl,de;ld a,(de);dec de;inc e;dec e;ld e,N;rra;jr nz,DIS;ld hl,NN;ld (NN),hl;inc hl;inc h;dec h;ld h,N;daa;jr z,DIS;add hl,hl;ld hl,(NN);dec hl;inc l;dec l;ld l,N;cpl;jr nc,DIS;ld sp,NN;ld (NN),a;inc sp;inc (hl);dec (hl);ld (hl),N;scf;jr c,DIS;add hl,sp;ld a,(NN);dec sp;inc a;dec a;ld a,N;ccf;ld b,b;ld b,c;ld b,d;ld b,e;ld b,h;ld b,l;ld b,(hl);ld b,a;ld c,b;ld c,c;ld c,d;ld c,e;ld c,h;ld c,l;ld c,(hl);ld c,a;ld d,b;ld d,c;ld d,d;ld d,e;ld d,h;ld d,l;ld d,(hl);ld d,a;ld e,b;ld e,c;ld e,d;ld e,e;ld e,h;ld e,l;ld e,(hl);ld e,a;ld h,b;ld h,c;ld h,d;ld h,e;ld h,h;ld h,l;ld h,(hl);ld h,a;ld l,b;ld l,c;ld l,d;ld l,e;ld l,h;ld l,l;ld l,(hl);ld l,a;ld (hl),b;ld (hl),c;ld (hl),d;ld (hl),e;ld (hl),h;ld (hl),l;halt;ld (hl),a;ld a,b;ld a,c;ld a,d;ld a,e;ld a,h;ld a,l;ld a,(hl);ld a,a;add a,b;add a,c;add a,d;add a,e;add a,h;add a,l;add a,(hl
   1 nop            ret            S
   1 m$(i)="DRIVE"
   1 m$(h)="TAPE"
   1 m$(g)="CANCEL"
   1 m$(f)="INITIALISE"
   1 m$(e)="SAVE ROYBOT"
   1 m$(d)="LOAD CODE"
   1 m$(c)="DISASSEMBLE"
   1 m$(b)="TEST"
   1 m$(a)="STOP"
   1 ld (23686),hl  ret            S
   1 ld (23682),bc  ld (23686),hl  S
   1 kval=ival+a
   1 ival<45000
   1 ival<40950
   1 init=33531
   1 i;m$(kval):
   1 i$=" "+i$+" ":
   1 hist=34515
   1 g$="test.bin":
   1 fast=35654
   1 f$="test.bas":
   1 f$;i$;m$(iv2+g);" ";
   1 endt=34382
   1 e$(e)="BACKTRACK "
   1 e$(d)="ERROR "
   1 e$(c)="BREAKPOINT"
   1 e$(b)="END"
   1 e$(a)="INVALID OP"
   1 d$(a)=m$(kval)+b$(c):
   1 d$(a)=e$(e)+"-"+
   1 d$(a)=b$(i):
   1 d$(a)=b$(h):
   1 d$(a)=b$(g):
   1 d$(a)=b$(f):
   1 d$(a)=b$(b):
   1 cadd=ival:
   1 bttr=35079
   1 b$(i)="Press ENTER, + other cancel"
   1 b$(h)="  Input drive number/letter"
   1 b$(g)="    Input file name"
   1 b$(f)="    Press ENTER"
   1 b$(e)="   Input number"
   1 b$(d)="Next just enter"
   1 b$(c)=" - input address"
   1 b$(b)="I/P register af bc de hl ix iy"
   1 b$(a)=" Input instruction or menu no."
   1 a;jval;" ";e$(bc):
   1 a;(d$(a));i$:
   1 a$="defw "+i$+
   1 a   f    ix     iy       sp                              1      bc      de      hl                                       2      szhpnc*]\
   1 ;"test.bin"
   1 ;"   No illegal copying please    ":
   1 )="RAM DISK"
   1 )="FLAGS Off       On"
   1 )=">44999 (40949)":
   1 )="8 Binary"
   1 )="7 Dec/Hex    15 Print      "+y$(2
   1 )="6 Backtrack  14 Step calls "+y$(1
   1 )="5 Run CLS    13 Real addr. "+y$(1
   1 )="4 Run fast   12 Memory MM  "+
   1 )="3 Run slow   11 Breakpoint "+
   1 )="2 Step       10 End  addr. "+
   1 )="1 Exit        9 Start addr."+
   1 );" a   bc    de    hl    ix    iy    ";s$(251
   1 );" ";s$(67
   1 );" ";s$(19
   1 );"  ";s$(287
   1 )+" "+b$(d):
   1 "test.bin"
   1 "test.bas"
   1 "                      ";s$(161
   1 ! "test.bin"
   1  ROYBOT 1987";